home *** CD-ROM | disk | FTP | other *** search
- ; Grapevine Issue 17 HD Install Script (1.0)
-
- alert "Grapevine Issue 17 HardDisk Install%c%cVersion 1.1a"
- select "dh0:gv17"
- space "2500" ; 2.5mb
- message "Installing Grapevine into `%s/'"
-
- mkdir "%s"
-
- copyifno "Gv17a:Libs/reqtools.library" "dh0:libs/reqtools.library"
- copy "GV17a:#?" "%s/"
- copy "GV17b:#?" "%s/"
- copy "GV17c:#?" "%s/"
-
- openfile "%s/Grapevine17"
- writetofile "assign gv17a: %s/"
- writetofile "assign gv17b: %s/"
- writetofile "assign gv17c: %s/"
- writetofile "gv17a:gv17"
- closefile ""
-
- delete "%s/GV17.info"
- delete "%s/HDInstall.info"
- delete "%s/disk.info"
-
- makeicon "%s/Grapevine17.info"
-
- closemessage ""
-
- alert "%cI Haven't installed any of the%cDEVS or L directories%cI assume you already have these%c"
- alert "%cNone of the sources etc. have been installed%cYou know where they are if you need them!%c"
- alert "%cInstall Complete%c"
-
- end ""
-
-